home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / compuserve-file-archive / 04 geoProgramming / COPEIN.SDA / SYSTEM (.txt) < prev    next >
Encoding:
GEOS ConVerT  |  2019-04-13  |  6.1 KB  |  329 lines
  1. System
  2. SEQ formatted GEOS file V1.0
  3. Epson FX-80
  4. UTILITY
  5. LASTER'S 
  6. ONVERTER 
  7. EDITFUN
  8. TABLES
  9. COPE Source V1.1
  10. COPE Editor V1.1
  11. Equates, constants, and routines.
  12. @4@R@d@t@
  13. ; *****************
  14. ; *     EQUATES FOR GEOS EDITOR
  15. ; *             BY BILL SHARP
  16. ; ***************
  17. curDevice = $BA
  18. STPAT = $C139
  19. ILRECT = $C19F
  20. HORLIN = $C118
  21. DISBUF = $002F
  22. R0 = $02
  23. R1 = $04
  24. R1L = $04
  25. R1H = $05
  26. R2 = $06
  27. R3 = $08
  28. R4 = $0A
  29. R5 = $0C
  30. R6 = $0E
  31. R7 = $10
  32. R8 = $12
  33. R9 = $14
  34. R10 = $16
  35. R11 = $18
  36. R12 = $1A
  37. R13 = $1C
  38. KEYVEC = $84A3
  39. STFVEC = $84AB
  40. KEYDTA = $8504
  41. PUTCHR = $C145
  42. ENTDSK = $C22C
  43. BOLD = 24
  44. PLAIN = 27
  45. HORIZ = 0
  46. VERT = 128
  47. MACT = 0
  48. MANTOP = 0
  49. MANBOT = 14
  50. MANLFT = 0
  51. A0 = $FB
  52. A1 = $FD
  53. MANRT = 142
  54. A2 = $70
  55. A3 = $72
  56. A4 = $74
  57. A5 = $76
  58. A6 = $78
  59. A7 = $7A
  60. A8 = $7C
  61. A9 = $7E
  62. START1 = A2
  63. END = A3
  64. DIST = A4
  65. CBP = A5
  66. SOB = A6
  67. EOB = A7
  68. LINEL1 = A8
  69. MISC = A9
  70. STRINX = $84BE
  71. STRINY = $84C0
  72. CRMODE = $2E
  73. MEMTOP = $57
  74. MEMBOT = $59
  75. CURPOS = $5B
  76. PC = A0
  77. PCRAM = A1
  78. X_Can = 72
  79. Y_Can = 72
  80. LineCount = 15 ;number of lines on the screen
  81. mouseXPos = $3A
  82. mouseYPos = $3C
  83. k_; CONSTANTS
  84. curDrive = $8489
  85. curRecord = $8496
  86. dirEntryBuf = $8400
  87. FileHeader = $8100
  88. CURDHD = $8200
  89. numDrives = $848D
  90. sysDBData = $851D
  91. ;----
  92. ; CONSTANTS
  93. curDrive = $8489
  94. curRecord = $8496
  95. dirEntryBuf = $8400
  96. FileHeader = $8100
  97. CURDHD = $8200
  98. numDrives = $848D
  99. sysDBData = $851D
  100. ;----
  101. ; NOTE:
  102. ;  The more labels you have the slower the Assembler
  103. ;  will run.  Place a semi-colon in front of the routines
  104. ;  you will not be using.
  105. ;MISC
  106. ;BootGEOS     =  $C000
  107. ;ResetHandle   =  $C003
  108. ;InterruptMain  =  $C100
  109. ; PROCESSES
  110. ;InitProcesses   =  $C103
  111. ;RestartProcess =  $C106
  112. ;EnableProcess  =  $C109
  113. ;BlockProcess   =  $C10C
  114. ;UnblockProcess =  $C10F
  115. ;FreezeProcess  =  $C112
  116. ;UnfreezeProcess = $C115
  117. ; GRAPHICS
  118.  HorizontalLine   =  $C118
  119.  InvertLine       =  $C11B
  120.  RecoverLine    = $C11E
  121.  VerticalLine     = $C121
  122.  Rectangle      = $C124
  123.  FrameRectangle = $C127
  124.  InvertRectangle = $C12A
  125.  RecoverRectangle = $C12D
  126.  DrawLine  = $C130
  127.  DrawPoint = $C133
  128.  GraphicsString = $C136
  129.  SetPattern =$C139
  130.  GetScanLine = $C13C
  131.  TestPoint = $C13F
  132. ; BACKGROUND GENERATION
  133.  BitmapUp = $C142
  134. ;  CHARACTER MANIPULATION
  135.  PutChar = $C145
  136.  PutString = $C148
  137.  UseSystemFont = $C14B
  138. ; MOUSE & MENUS
  139.  StartMouseMode = $C14E
  140.  RecoverMenu = $C154
  141.  RecoverAllMenus = $C157
  142.  DoIcons = $C15A
  143. ; UTILITIES
  144. ;DShiftLeft = $C15D
  145. ;BBMult = $C160
  146. ;BMult = $C163
  147. ;DMult = $C166
  148. ;Ddiv = $C169
  149. ;DSdiv = $C16C
  150. ;Dabs = $C16F
  151. ;Dnegate = $C172
  152. ;Ddec = $C175
  153. ;ClearRam = $C178
  154. ;FillRam = $C17B
  155. ;MoveData = $C17E
  156. ;InitRam = $C181
  157. ;PutDecimal = $C184
  158. ;GetRandom = $C187
  159. ; MISC MOUSE, MENU, GRAPHICS, SLEEP
  160.  MouseUp = $C18A
  161.  MouseOff = $C18D
  162.  DoPreviousMenu = $C190
  163.  ReDoMenu = $C193
  164.  GetSerialNumber = $C196
  165.  Sleep = $C199
  166.  ClearMouseMode = $C19C
  167.  i_Rectangle = $C19F
  168.  i_FrameRectangle = $C1A2
  169.  i_RecoverRectangle = $C1A5
  170.  i_GraphicsString = $C1A8
  171. ;  BACKGROUND GENERATION
  172.  i_BitmapUp = $C1AB
  173. ; CHARACTER MANIPULATIION
  174.  i_PutString = $C1AE
  175.  GetRealSize = $C1B1
  176. ;      MOUSE & MENUS
  177. ;      UTILITIES
  178. ;i_FillRam = $C1B4
  179. ;i_MoveData = $C1B7
  180. ; ROUTINES ADDED LATER
  181. ;GetString = $C1BA
  182.  GotoFirstMenu = $C1BD
  183. ;InitTextPrompt = $C1C0
  184. ;MainLoop = $C1C3
  185. ;DrawSprite = $C1C6
  186. ;GetCharWidth = $C1C9
  187. ;LoadCharSet = $C1CC
  188. ;PosSprite = $C1CF
  189. ;EnablSprite = $C1D2
  190. ;DisablSprite = $C1D5
  191. ;CallRoutine = $C1D8
  192. ;CalcBlksFree = $C1DB
  193. ;ChkDkGEOS = $C1DE
  194.  NewDisk = $C1E1
  195.  GetBlock = $C1E4
  196.  PutBlock = $C1E7
  197. ;SetGEOSDisk = $C1EA
  198.  SaveFile = $C1ED
  199. ;SetGDirEntry = $C1F0
  200. ;BldGDirEntry = $C1F3
  201. ;GetFreeDirBlk = $C1F6
  202.  WriteFile = $C1F9
  203. ;BlkAlloc = $C1FC
  204.  ReadFile = $C1FF
  205. ;SmallPutChar = $C202
  206. ;FollowChain = $C205
  207.  GetFile = $C208
  208.  FindFile = $C20B
  209. ;CRC = $C20E
  210.  LdFile = $C211
  211. ;EnterTurbo = $C214
  212. ;LdDeskAcc = $C217
  213.  ReadBlock = $C21A
  214. ;LdApplic = $C21D
  215. ;WriteBlock = $C220
  216. ;VerWriteBlock = $C223
  217. ;FreeFile = $C226
  218.  GetFHdrInfo = $C229
  219.  EnterDeskTop = $C22C
  220. ;StartAppl = $C22F
  221. ;ExitTurbo = $C232
  222. ;PurgeTurbo = $C235
  223.  DeleteFile = $C238
  224.  FindFTypes = $C23B
  225. ;RstrAppl = $C23E
  226. ;ToBasic = $C241
  227. ;FastDelFile = C244
  228. ;GetDirHead = $C247
  229. ;PutDirhead = $C24A
  230. ;NxtBlkAlloc = $C24D
  231. ;ImprintRectangle = $C250
  232. ;i_ImprintRectangle = $C253
  233.  DoDlgBox = $C256
  234. ;RenameFile = $C259
  235. ;InitForIO = $C25C
  236. ;DoneWithIO = $C25F
  237. ;DShiftRight = $C262
  238. ;CopyString = $C265
  239. ;CopyFString = $C268
  240. ;CmpString = $C26B
  241. ;CmpFString = $C26E
  242. ;FirstInit = $C271
  243.  OpenRecordFile = $C274
  244.  CloseRecordFile = $C277
  245.  NextRecord = $C27A
  246.  PreviousRecord = $C27D
  247.  PointRecord = $C280
  248.  DeleteRecord = $C283
  249.  InsertRecord = $C286
  250.  AppendRecord = $C289
  251.  ReadRecord = $C28C
  252.  WriteRecord = $C28F
  253. ;SetNextFree = $C292
  254. ;UpdateRecordFile = $C295
  255.  GetPtrCurDkNm = $C298
  256. ;PromptOn = $C29B
  257. ;PromptOff = $C29E
  258.  OpenDisk = $C2A1
  259. ;DoInlineReturn = $C2A4
  260. ;GetNextChar = $C2A7
  261. ;BitmapClip = $C2AA
  262. ;FindBAMBit = $C2AD
  263.  SetDevice = $C2B0
  264.  IsMseInRegion = $C2B3
  265. ;ReadByte = $C2B6
  266. ;FreeBlock = $C2B9
  267. ;ChangeDiskDevice = $C2BC
  268. ;RstrFrmDialog = $C2BF
  269. ;Panic = $C2C2
  270. ;BitOtherClip = $C2C5
  271. ;StashRAM = $C2C8
  272. ;FetchRAM = $C2CB
  273. ;SwapRAM = $C2CE
  274. ;VerifyRAM = $C2D1
  275. ;DoRAMOp = $C2D4
  276. a;MAcros for Assembler
  277. ;------
  278. ; MACROS
  279. .MAC loadw; examp.le load R0:memus
  280. ldx #<?2
  281. stx ?1
  282. ldx #>?2
  283. stx ?1+1
  284. ;----
  285. ; this macro sets up the menu structure
  286. .MAC menu
  287. .Word ?1
  288. .Byte ?2
  289. .Word ?3
  290. ;-----
  291. .MAC movew
  292.  ldx ;MAcros for Assembler
  293. ;------
  294. ; MACROS
  295. .MAC loadw; examp.le load R0:memus
  296. ldx #<?2
  297. stx ?1
  298. ldx #>?2
  299. stx ?1+1
  300. ;----
  301. ; this macro sets up the menu structure
  302. .MAC menu
  303. .Word ?1
  304. .Byte ?2
  305. .Word ?3
  306. ;-----
  307. .MAC movew
  308.  ldx ?1
  309.  stx ?2
  310.  ldx ?1+1
  311.  stx ?2+1
  312. ;----
  313. .MAC addw
  314. lda ?1
  315. adc ?2
  316. sta ?2
  317. lda ?1+1
  318. adc ?2+1
  319. sta ?2+1
  320. ;----
  321. .MAC addy
  322. adc ?1
  323. sta ?1
  324. lda ?1+1
  325. adc #0
  326. sta ?1+1
  327. ;----
  328. ;-----
  329.